home *** CD-ROM | disk | FTP | other *** search
/ MacWorld Online: Hot Shareware / MacWorld CD-ROM Online (Hot Shareware).cdr / Intro movie / 00047.ls < prev    next >
Encoding:
Text File  |  1996-03-08  |  1.0 KB  |  46 lines
  1. on mouseDown
  2.   puppetSound("Metallic.aiff")
  3. end
  4.  
  5. on buttonsOn
  6.   puppetSprite(10, 1)
  7.   puppetSprite(11, 1)
  8.   puppetSprite(12, 1)
  9.   puppetSprite(13, 1)
  10.   puppetSprite(14, 1)
  11. end
  12.  
  13. on buttonsOff
  14.   puppetSprite(10, 0)
  15.   puppetSprite(11, 0)
  16.   puppetSprite(12, 0)
  17.   puppetSprite(13, 0)
  18.   puppetSprite(14, 0)
  19. end
  20.  
  21. on buttonsRoll
  22.   if rollOver(2) then
  23.     set the castNum of sprite 10 to the number of cast "hot tour.pct"
  24.   else
  25.     set the castNum of sprite 10 to the number of cast "nada-gray"
  26.   end if
  27.   if rollOver(3) then
  28.     set the castNum of sprite 11 to the number of cast "hotware.pct"
  29.   else
  30.     set the castNum of sprite 11 to the number of cast "nada-gray"
  31.   end if
  32.   if rollOver(6) then
  33.     set the castNum of sprite 14 to the number of cast "exit hilite"
  34.   else
  35.     set the castNum of sprite 14 to the number of cast "nada-gray"
  36.   end if
  37. end
  38.  
  39. on continueRoll
  40.   if rollOver(6) then
  41.     set the castNum of sprite 10 to the number of cast "continue hilite.pct"
  42.   else
  43.     set the castNum of sprite 10 to the number of cast "nada"
  44.   end if
  45. end
  46.